(find-file-read-only-other-window): Use find-file-other-window.

diff --git a/lisp/files.el b/lisp/files.el
index 32ef61a6277c260fd15954fa2051c1d329fa2c3b..f8a1ea1715b43347b382cde4674686efffac2d40 100644 (file)
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -390,7 +390,7 @@ Use \\[toggle-read-only] to permit editing."
 Like \\[find-file-other-window] but marks buffer as read-only.
 Use \\[toggle-read-only] to permit editing."
   (interactive "fFind file read-only other window: ")
-  (find-file filename)
+  (find-file-other-window filename)
   (setq buffer-read-only t))
 
 (defun find-file-read-only-other-frame (filename)